$PBExportHeader$w_escala_de_notas.srw
$PBExportComments$Ventana de escala de notas.
forward
global type w_escala_de_notas from w_multilinea
end type
end forward

global type w_escala_de_notas from w_multilinea
end type
global w_escala_de_notas w_escala_de_notas

on w_escala_de_notas.create
call super::create
end on

on w_escala_de_notas.destroy
call super::destroy
end on

event ue_optar;call super::ue_optar;// deshabilito el boton de borrar en el detalle, sino borra el encabezado.
// m_mdi.m_operaciones.m_borrar.Enabled = FALSE
//at_op.Baja = FALSE
end event

event ue_iniciar;call super::ue_iniciar;// Habilitar los botones de agregar y borrar detalles de la escala segun si se puede modificar o no
IF dw_1.RowCount() > 0 THEN
	pb_1.Enabled = (IsNull(dw_1.Object.deja_modificar[1]) OR dw_1.Object.deja_modificar[1] = 0)
	pb_2.Enabled = (IsNull(dw_1.Object.deja_modificar[1]) OR dw_1.Object.deja_modificar[1] = 0)
END IF


end event

type pb_1 from w_multilinea`pb_1 within w_escala_de_notas
boolean BringToTop=true
FontCharSet FontCharSet=Ansi!
end type

type pb_2 from w_multilinea`pb_2 within w_escala_de_notas
boolean BringToTop=true
end type

